Public Class News
Inherits Message

'Component: Header
Private m_Header As Header

<FieldInfo(GetType(Header), 0)> _
Public Property Header() As Header
Get
Return m_Header
End Get
Set (value As Header)
m_Header = value
End Set
End Property



Private m_OrigTime As DateTimeOffset

<FieldInfo(GetType(OrigTimeFieldInfo), 1)> _
Public Property OrigTime() As DateTimeOffset
Get
Return m_OrigTime
End Get
Set (value As DateTimeOffset)
m_OrigTime = value
End Set
End Property

Private m_Urgency As Char

<FieldInfo(GetType(UrgencyFieldInfo), 2)> _
Public Property Urgency() As Char
Get
Return m_Urgency
End Get
Set (value As Char)
m_Urgency = value
End Set
End Property

Private m_Headline As String

<FieldInfo(GetType(HeadlineFieldInfo), 3)> _
Public Property Headline() As String
Get
Return m_Headline
End Get
Set (value As String)
m_Headline = value
End Set
End Property

Private m_EncodedHeadlineLen As Int32

<FieldInfo(GetType(EncodedHeadlineLenFieldInfo), 4)> _
Public Property EncodedHeadlineLen() As Int32
Get
Return m_EncodedHeadlineLen
End Get
Set (value As Int32)
m_EncodedHeadlineLen = value
End Set
End Property

Private m_EncodedHeadline As Byte()

<FieldInfo(GetType(EncodedHeadlineFieldInfo), 5)> _
Public Property EncodedHeadline() As Byte()
Get
Return m_EncodedHeadline
End Get
Set (value As Byte())
m_EncodedHeadline = value
End Set
End Property

'Group: NoRoutingIDs
Private m_NoRoutingIDs As New List(Of NoRoutingIDsGroup)

<FieldInfo(GetType(NoRoutingIDsGroup), 6)> _
Public ReadOnly Property NoRoutingIDs As List(Of NoRoutingIDsGroup)
Get
Return m_NoRoutingIDs
End Get
End Property

Public Class NoRoutingIDsGroup
Inherits Group

Private m_RoutingType As RoutingType

<FieldInfo(GetType(RoutingTypeFieldInfo), 0)> _
Public Property RoutingType() As RoutingType
Get
Return m_RoutingType
End Get
Set (value As RoutingType)
m_RoutingType = value
End Set
End Property

Private m_RoutingID As String

<FieldInfo(GetType(RoutingIDFieldInfo), 1)> _
Public Property RoutingID() As String
Get
Return m_RoutingID
End Get
Set (value As String)
m_RoutingID = value
End Set
End Property


End Class



'Group: NoRelatedSym
Private m_NoRelatedSym As New List(Of NoRelatedSymGroup)

<FieldInfo(GetType(NoRelatedSymGroup), 7)> _
Public ReadOnly Property NoRelatedSym As List(Of NoRelatedSymGroup)
Get
Return m_NoRelatedSym
End Get
End Property

Public Class NoRelatedSymGroup
Inherits Group

'Component: Instrument
Private m_Instrument As Instrument

<FieldInfo(GetType(Instrument), 0)> _
Public Property Instrument() As Instrument
Get
Return m_Instrument
End Get
Set (value As Instrument)
m_Instrument = value
End Set
End Property


End Class



'Group: NoLegs
Private m_NoLegs As New List(Of NoLegsGroup)

<FieldInfo(GetType(NoLegsGroup), 8)> _
Public ReadOnly Property NoLegs As List(Of NoLegsGroup)
Get
Return m_NoLegs
End Get
End Property

Public Class NoLegsGroup
Inherits Group

'Component: InstrumentLeg
Private m_InstrumentLeg As InstrumentLeg

<FieldInfo(GetType(InstrumentLeg), 0)> _
Public Property InstrumentLeg() As InstrumentLeg
Get
Return m_InstrumentLeg
End Get
Set (value As InstrumentLeg)
m_InstrumentLeg = value
End Set
End Property


End Class



'Group: NoUnderlyings
Private m_NoUnderlyings As New List(Of NoUnderlyingsGroup)

<FieldInfo(GetType(NoUnderlyingsGroup), 9)> _
Public ReadOnly Property NoUnderlyings As List(Of NoUnderlyingsGroup)
Get
Return m_NoUnderlyings
End Get
End Property

Public Class NoUnderlyingsGroup
Inherits Group

'Component: UnderlyingInstrument
Private m_UnderlyingInstrument As UnderlyingInstrument

<FieldInfo(GetType(UnderlyingInstrument), 0)> _
Public Property UnderlyingInstrument() As UnderlyingInstrument
Get
Return m_UnderlyingInstrument
End Get
Set (value As UnderlyingInstrument)
m_UnderlyingInstrument = value
End Set
End Property


End Class



'Group: LinesOfText
Private m_LinesOfText As New List(Of LinesOfTextGroup)

<FieldInfo(GetType(LinesOfTextGroup), 10)> _
Public ReadOnly Property LinesOfText As List(Of LinesOfTextGroup)
Get
Return m_LinesOfText
End Get
End Property

Public Class LinesOfTextGroup
Inherits Group

Private m_Text As String

<FieldInfo(GetType(TextFieldInfo), 0)> _
Public Property Text() As String
Get
Return m_Text
End Get
Set (value As String)
m_Text = value
End Set
End Property

Private m_EncodedTextLen As Int32

<FieldInfo(GetType(EncodedTextLenFieldInfo), 1)> _
Public Property EncodedTextLen() As Int32
Get
Return m_EncodedTextLen
End Get
Set (value As Int32)
m_EncodedTextLen = value
End Set
End Property

Private m_EncodedText As Byte()

<FieldInfo(GetType(EncodedTextFieldInfo), 2)> _
Public Property EncodedText() As Byte()
Get
Return m_EncodedText
End Get
Set (value As Byte())
m_EncodedText = value
End Set
End Property


End Class



Private m_URLLink As String

<FieldInfo(GetType(URLLinkFieldInfo), 11)> _
Public Property URLLink() As String
Get
Return m_URLLink
End Get
Set (value As String)
m_URLLink = value
End Set
End Property

Private m_RawDataLength As Int32

<FieldInfo(GetType(RawDataLengthFieldInfo), 12)> _
Public Property RawDataLength() As Int32
Get
Return m_RawDataLength
End Get
Set (value As Int32)
m_RawDataLength = value
End Set
End Property

Private m_RawData As Byte()

<FieldInfo(GetType(RawDataFieldInfo), 13)> _
Public Property RawData() As Byte()
Get
Return m_RawData
End Get
Set (value As Byte())
m_RawData = value
End Set
End Property


'Component: Trailer
Private m_Trailer As Trailer

<FieldInfo(GetType(Trailer), 14)> _
Public Property Trailer() As Trailer
Get
Return m_Trailer
End Get
Set (value As Trailer)
m_Trailer = value
End Set
End Property


End Class

